Define mouse-set-font in mule-menu-keymap agian.

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 94e8ac37518f91b020e7b8eec65a8bc9c7746ded..3f7295ab2b1d90eecc90737d6d8ed088deca1910 100644 (file)
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -72,6 +72,9 @@
 (define-key-after mule-menu-keymap [set-language-environment]
   '("Set language environment" . setup-language-environment-map)
   t)
+(define-key-after mule-menu-keymap [mouse-set-font]
+  '("Set font/fontset" . mouse-set-font)
+  t)
 (define-key-after mule-menu-keymap [separator-mule]
   '("--")
   t)